home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen… 1994 February Supplement / ARPL-Feb-94-Supplement-PowerPC.iso / 3rd Party PowerPC Demo Apps / Aldus FreeHand / Aldus FreeHand 4.0 TV / Aldus FreeHand 4.0 TV.rsrc / Post_1154 < prev    next >
Encoding:
Text File  |  1994-01-25  |  211 b   |  17 lines
  1. supdict begin
  2. /blade { 
  3.  brandxy  translate 
  4.  /wid 5 randint 5 add def
  5.  0 0 m
  6.  0 3 3 10 wid 10 C } def
  7. end 
  8. /randomgrass
  9. {supdict begin 
  10. newinside q
  11. [0 0 0 1] vc
  12.  {q blade
  13.  1 w stroke Q 
  14.  } repeat end 
  15. Q
  16. } def